home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
351-375
/
disk_374
/
mat
/
linecount
< prev
next >
Wrap
Text File
|
1992-05-06
|
423b
|
13 lines
.K OF,OF1,OF2,OF3,OF4
.BRA {
.KET }
;; LINECOUNT -- Counts lines in text files.
MAT S #@!$%^__++ T "" TAG "^|File ^P: ^N lines" {OF$#?} {OF1} {OF2} {OF3} {OF4}
; ^^^ Not a swear word! -- just a string which'll never match (I hope!)
;; each file is scanned to the end, but no match is found, therefore the
;; "fail" part of the tag is output; this simply displays the pathname
;; and the number of lines scanned.